module RunKB where
import System.IO
import Data.Char(toUpper)
import System.Environment
import Datatype
import VertexCover
import Fileparser


--------------------------------------------------------------
-- this method take input file path and out put path.
-- the result will put input out put file if only if input
-- file is valid.
--
--eg : main "d:\\input.txt" "d:\\output.txt"
--
--
--
--
--------------------------------------------------------------
main :: String-> String -> IO ()
main  ipf opf  = do 
       inh <- openFile ipf ReadMode
       outh <- openFile opf WriteMode
       inpStr <- hGetContents inh
       hPutStr outh (getOutputfile inpStr)
       hClose inh
       hClose outh
